COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	PRECEDE
C00004 ENDMK
C⊗;
PRECEDE;
FUNC FUN; < F1, F2, F3, F4, F5, F6
FUNC PPP[SCR,LCS]; < F1, F2, F3, F4, F5, F6
COMMON TOOT   TOOT CLAR BRIT BUZZ;
COMMON REVRB;
*
REVRB 0 1;P2 9;END;
CLAR ;  < SAMSON BOX VERSION
P2 RH/18X18/4;
P3 C4;
P4 .7 ; P5 F2; 
   P6 F4;
P12 .1 ALL;
P13 FU/1/4/5/6;
P18 NU/0/1/2/3/4/5/6/7/8/9/10/11/12/13/
14/15/16/17/18/FINE;
P19 MICRO 18  ;
DF P22;
P22 ALL .2 2,4  .8 1,1;
END;
BUZZ 0 0 13;
P2 RH/12X12/4;
P3 NO/C2/CS/D/DS/E/F/FS/G/GS/A/AS/B/C3;
P4 1   ; P5 F3;
 P6 F6;
P13 F4;
DF P22;
END;
BRIT 0 6;
DUPL 3; P5 F2;
P4 MOVE /6 .1 1.2;
P2 .1;
P3 MOV/3 C1 C7 C4 C4/3 C4 C4 C1 C8;
P13 .25 "F1" .25 "F4" .25 "F5" .25 "F5";
DF P22;
P22 MOVE/6 .8 5;
END;